home *** CD-ROM | disk | FTP | other *** search
/ Know Your Hockey - The Greatest Player Resource / Know Your Hockey: The Greatest Player Resource.iso / hockey / director / ssqcst.cst / 00128_Script_Banner Modifier scripts SSQ < prev    next >
Text File  |  1998-09-28  |  2KB  |  117 lines
  1. global gPopn, gXcast, gOpning
  2. --resets the button state when the popups are toggled off
  3. on popmenuSSQ
  4.   initpopMenu("pop",313,60,161,204,"pop")
  5. end
  6.  
  7. on AnnSSQ
  8.   stoponly
  9.   Losepop(window "pop") 
  10.   ReSetBanner
  11.   playAnn
  12. end
  13.  
  14. on CoachSSQ
  15.   stoponly
  16.   losepop(window "pop")  
  17.   ReSetBanner
  18.   playCoach
  19. end
  20.  
  21. on helpbutton
  22.   puppetsound 0
  23.   losepop(window "pop")
  24.   resetBanner
  25.   if the membernum of sprite 48 > 0 then Stoponly
  26.   updatestage
  27.   StartHelp(the clickon)
  28. end
  29.  
  30.  
  31. on SSQlink
  32.   resetbanner
  33.   Losepop(window "pop")
  34.   StopOnly
  35.   updatestage
  36.   repeat with x = 1 to 48
  37.     puppetsprite x,0
  38.   end repeat
  39.   
  40.   set the itemDelimiter = "."
  41.   set test = item 1 of the moviename
  42.   if test = "SSQintro" then
  43.     SSQDLlink2(the clickon)
  44.   else
  45.     SSQDLlink(the clickon)  
  46.   end if
  47.   set the itemDelimiter = ","
  48. end
  49.  
  50. on SSQJR
  51.   losepop(window "pop")
  52.   put the membernum of sprite 48 into s
  53.   case s > 0 of 
  54.     1:
  55.       set themovie = the name of member s of castlib 3
  56.     0:
  57.       set themovie = empty
  58.   end case
  59.   
  60.   set theone = (the number of member "KM" of castlib gXcast)+1
  61.   set c = the name of member theone
  62.   showlocals
  63.   if  c = themovie then 
  64.     set the type of sprite 48 = 0
  65.     set gOpning = empty
  66.     set the movierate of sprite 48 = 0
  67.     set the membernum of sprite 48 = 0
  68.     controloff
  69.     updateStage
  70.   else
  71.     IntroJr  theone
  72.     set the visible of sprite 48 = 1
  73.     set the type of sprite 40 = 0
  74.     updatestage
  75.     puppetsprite 40,0
  76.     put empty into field "CardCount" of castlib "Internal"
  77.     ResetPro 
  78.     ResetPlayers
  79.     controlon
  80.   end if
  81. end
  82.  
  83. on SSQPRO
  84.   losepop(window "pop")
  85.   put the membernum of sprite 48 into s
  86.   case s > 0 of 
  87.     1:
  88.       set themovie = the name of member s of castlib 3
  89.     0:
  90.       set themovie = empty
  91.   end case
  92.   
  93.   set theone = (the number of member "PM" of castlib gXcast)+1
  94.   set c = the name of member theone
  95.   showlocals
  96.   if  c = themovie then 
  97.     set the type of sprite 48 = 0
  98.     set gOpning = empty
  99.     set the movierate of sprite 48 = 0
  100.     set the membernum of sprite 48 = 0
  101.     controloff
  102.     updateStage
  103.   else
  104.     IntroPro theone
  105.     set the visible of sprite 48 = 1
  106.     set the type of sprite 40 = 0
  107.     updatestage
  108.     puppetsprite 40,0
  109.     put empty into field "CardCount" of castlib "Internal"
  110.     ResetPro 
  111.     ResetPlayers
  112.     controlon
  113.   end if
  114. end
  115.  
  116.  
  117.